COMMENT ⊗   VALID 00003 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	\input basic
C00005 00003	\magnify{1200}
C00010 ENDMK
C⊗;
\input basic
\font D=cmr7 at 14pt % for title only
\font E=cmtt at 15pt % likewise
\font L=cmsa10
\font t=cmtt \def\tt{\:t} % typewriter text
\font m=cmsc10 \def\sc{\:m} % small caps
\font b=cmr9 \def\mc{\:b} % medium caps for names like PASCAL
\font C←cmss8
\font P←cmsss8
\def\.#1{\hbox{\tt#1}}
\def\_{\hskip.06em\vbox{\hrule width.3em}} % underline in identifiers
\def\\#1{\hbox{\it#1\/\hskip.05em}} % italic type for identifiers
\def\
{\hbox{\bf#1}}		% boldface type for reserved words
\chcode'27=13 \def↔{\ifmmode{\mathrel{\char'444}}\else{\penalty999\ } }
	% make ↔ tie two words together except in math mode
\def\TEX{T\hbox{\hskip-.1667em\lower.424ex\hbox{E}\hskip-.125em X}}
\def\PASCAL{{\mc PASCAL}}
\def\pb{\.{|...|}}

\def\section #1.{\penalty-50\vskip 12pt plus 3pt minus 3pt
	\noindent{\bf #1.}\quad\!}
\def\yskip{\vskip 3pt plus 3pt minus 1pt}
\def\sp{\char'40 } % visible blank space in typewriter font
\def\bk{\char'134 } % backslash character in typewriter font
\def\lb{\char'173 } % left brace in typewriter font
\def\rb{\char'175 } % right brace in typewriter font
\def\ul{\char'32 } % underline character in typewriter font

\def\hang{\hangindent 4em\ \unskip}
\def\PASCAL{{\mc PASCAL}}
\def\WEB{{\tt WEB}}
\def\WEAVE{{\tt WEAVE}}
\def\TANGLE{{\tt TANGLE}}
\magnify{1200}

\ctrline{\hbox to 4.875 truein
{A tape from The Computer Science Dept. at Stanford University.}}
\ctrline{\hbox to 4.375 truein
{Written on 6/11/82 in ascii (padded to 80 char. per line).}}
\ctrline{\hbox to 4.000 truein
{This tape contains the \TANGLE\ and \WEAVE\ pre-compilers,}}
\ctrline{\hbox to 3.500 truein
{the old \TEX\ in \PASCAL, some sample test files,}}
\ctrline{\hbox to 2.875 truein
{some font programs and some typical}}
\ctrline{ TFM and PXL font files.}

\vfill


\ctrline{\hbox to 4.875 truein
{A tape from The Computer Science Dept. at Stanford University.}}
\ctrline{\hbox to 4.375 truein
{Written on 6/11/82 in ascii (padded to 80 char. per line).}}
\ctrline{\hbox to 4.000 truein
{The following files are in the order shown: tangle.web,}}
\ctrline{\hbox to 3.500 truein
{tangle.pas, tangle.tex, tangle.suai-changes,}}
\ctrline{\hbox to 2.875 truein
{weave.web, \ weave.pas, \ weave.tex,}}
\ctrline{weave.suai-changes, basic.tex,}
\ctrline{webhdr.tex.}

\vfill

\ctrline{\hbox to 4.875 truein
{A tape from The Computer Science Dept. at Stanford University.}}
\ctrline{\hbox to 4.375 truein
{Written on 6/11/82 in ascii (padded to 80 char. per line).}}
\ctrline{\hbox to 4.000 truein
{The following files are in the order shown: tangle.web,}}
\ctrline{\hbox to 3.500 truein
{tangle.pas, tangle.tex, tangle.suai-changes,}}
\ctrline{\hbox to 2.875 truein
{weave.web, \ weave.pas, \ weave.tex,}}
\ctrline{weave.suai-changes, basic.tex,}
\ctrline{webhdr.tex.}

\vfill
\ctrline{Please return tape to}
\ctrline{Arthur L. Samuel}
\ctrline{Computer Science Dept.}
\ctrline{Stanford University}
\ctrline{Stanford, CA. 94305}

\vfill
\ctrline{Please return tape to}
\ctrline{Arthur L. Samuel}
\ctrline{Computer Science Dept.}
\ctrline{Stanford University}
\ctrline{Stanford, CA. 94305}

\vfill
\end

textap <tex.web>tangle.web
textap <tex.web>tangle.pas
textap <tex.web>tangle.tex
textap <tex.web>tangle.suai-changes
textap <tex.web>weave.web
textap <tex.web>weave.pas
textap <tex.web>weave.tex
textap <tex.web>weave.suai-changes
textap <tex.fonts>basic.tex
textap <tex.web>webhdr.tex